`geom_histogram`和`stat_bin（）`不对齐

构造直方图后，我想在绘图中添加上边界/轮廓。我不想使用，geom_bar或者geom_col因为我不想每个容器的垂直边界。
我的尝试包括使用geom_histogram和stat_bin(geom = "bin")，但是垃圾箱无法对齐。

我每个GEOM（内调整参数bins，binwidth，center，boundary），并一直无法对齐这些分布。关于SO也有类似的问题（在geom_histogram或stat_bin上覆盖geom_points），但似乎没有一个类似的问题可以挖掘或提供解决方案。

这是我的几何图层不对齐的情况：

set.seed(2019)
library(ggplot2)
library(ggthemes)
df <- data.frame(x = rnorm(100), 
                 y = rep(c("a", "b"), 50))

p <- df %>% 
    ggplot(aes(x, fill = y)) + 
    geom_histogram() + 
    facet_wrap(vars(y)) + 
    theme_fivethirtyeight() + 
    guides(fill = F)

这是图p，我的基本直方图：

p + stat_bin(geom = "step")

我希望这两个几何图形对齐。我已经测试了各种虚拟数据，但这仍然是一个问题。这些几何体为什么不自然对齐？如何调整这些层中的任何一层以对齐？有没有比结合直方图和统计盒更好的替代方法来实现我想要的图了？